home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
QRZ! Ham Radio 8
/
QRZ Ham Radio Callsign Database - Volume 8.iso
/
pc
/
files
/
mac
/
proj_b1.hqx
/
Project Mac - B1
/
Radio
/
card_4984.txt
< prev
next >
Wrap
Text File
|
1987-12-15
|
2KB
|
83 lines
-- card: 4984 from stack: in
-- bmap block id: 5188
-- flags: 0000
-- background id: 2782
-- name:
-- part 1 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=151 top=62 right=79 bottom=188
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: forward
-- part 2 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=151 top=80 right=97 bottom=188
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: reflected
-- part 3 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=149 top=100 right=118 bottom=188
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: VSWR
-- part 4 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=84 top=101 right=118 bottom=146
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:
----- HyperTalk script -----
on mouseUp
set the numberFormat to "0.00"
put the value of card field "reflected" into a
put the value of card field "forward" into b
put a/b into k
put the value of (1+sqrt(k))/(1-sqrt(k)) into card field "vswr"
end mouseUp
-- part contents for card part 1
----- text -----
40
-- part contents for card part 2
----- text -----
10
-- part contents for card part 3
----- text -----
3.00